home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue59 / Arch / Extended Sample / UnitObjectEntityOrders.dfm < prev    next >
Encoding:
Text File  |  2000-06-05  |  431 b   |  20 lines
  1. inherited ObjectEntityOrders: TObjectEntityOrders
  2.   Left = 285
  3.   Top = 161
  4.   Height = 479
  5.   object QueryOrders: TQuery
  6.     DatabaseName = 'DBDEMOS'
  7.     RequestLive = True
  8.     SQL.Strings = (
  9.       'select * from orders.db where (OrderNo = :OrderNo)')
  10.     Left = 76
  11.     Top = 44
  12.     ParamData = <
  13.       item
  14.         DataType = ftInteger
  15.         Name = 'OrderNo'
  16.         ParamType = ptUnknown
  17.       end>
  18.   end
  19. end
  20.